<?php
//************* AGREGAR LIBRERIA PDF ******************
require('../pdf/fpdf.php'); 
//require('pdf/cellfit.php');
//include_once "pdf/cellfit.php";
//$pdf->CellFitScale(20,10,utf8_decode($_REQUEST['titulo']),1,1);
//************* APERTURA DE LA BASE DE DATOS ******************
$conexion = new mysqli("localhost","root","","gmaster") or die("Fallo al conectar con la base de datos. -> [".$conexion->connect_errno."] ".$conexion->connect_error);
$conexion->query("SET NAMES 'utf8'");

//************* FECHA EN FORMATO ESPAÑOL ******************
setlocale(LC_ALL,"es_ES","esp_esp");
setlocale(LC_CTYPE,"es_ES","esp_esp");

//************** INTERACCIONES CON LA BASE DE DATOS ******************
switch($_REQUEST['titulo']){
	case "Gestión del Plan Docente de los Departamentos (PDD)":
		$pdf = new FPDF();
		//Establecemos los márgenes izquierda, arriba y derecha: 
		$pdf->SetMargins(10, 20 , 10); 
		//Establecemos el margen inferior: 
		$pdf->SetAutoPageBreak(true,15); 
		//Leer los tipos de modulos
		$tuplas = $conexion->query("select id,nombre,id_coordinador,tipo_modulo from modulo order by tipo_modulo") or die("-1%Problemas al mostrar modulos del proyecto en PDF. -> [".$conexion->errno."] ".$conexion->error);
		while($reg = $tuplas->fetch_array()){	
			$tuplas2 = $conexion->query("select id,nombre from asignatura where id_modulo=".$reg[id]) or die("-1%Problemas al mostrar asignaturas del proyecto en PDF. -> [".$conexion->errno."] ".$conexion->error);
			while($reg2 = $tuplas2->fetch_array()){
				$pdf->AddPage(L,A4);
				$pdf->SetFont('Arial','B',9);
				if($reg[tipo_modulo]=='gen'){
					//$pdf->SetFont('Arial','B',9);
					$pdf->Cell(0,6,utf8_decode("MODULO GENÉRICO"),0,1);$pdf->Ln(0);
					//$pdf->Cell(0,6,utf8_decode(mb_strtoupper($reg2[nombre],'utf-8')),0,1);$pdf->Ln(0);
				}
				if($reg[tipo_modulo]=='esp'){
					//$pdf->SetFont('Arial','B',9);
					$pdf->Cell(0,6,utf8_decode("MODULO ESPECÍFICO: ".$reg[nombre]),0,1);$pdf->Ln(0);
					//$pdf->Cell(0,6,utf8_decode(mb_strtoupper($reg2[nombre],'utf-8')),0,1);$pdf->Ln(0);
				}
				if($reg[tipo_modulo]=='opt'){
					//$pdf->SetFont('Arial','B',9);
					$pdf->Cell(0,6,utf8_decode("MODULO GENÉRICO".$reg[nombre]),0,1);$pdf->Ln(0);
					//$pdf->Cell(0,6,utf8_decode(mb_strtoupper($reg2[nombre],'utf-8')),0,1);$pdf->Ln(0);
				}
				$pdf->Cell(0,6,utf8_decode(mb_strtoupper($reg2[nombre],'utf-8')),0,1);$pdf->Ln(0);
				$pdf->SetFont('Times','B',9);
				$pdf->Cell(45,8,utf8_decode(),1,0);$pdf->Cell(60,8,utf8_decode("Profesorado con docencia"),LTB,0);$pdf->Cell(10,8,utf8_decode(),TRB,0);$pdf->Cell(45,8,utf8_decode("Departamento"),1,0);$pdf->Cell(90,8,utf8_decode("Area de Conocimiento"),1,0);$pdf->Cell(25,8,utf8_decode("Porcentaje"),1,1);
				$tuplas3 = $conexion->query("select g.id,CONCAT_WS(' ',u.nombre,u.apellido1,u.apellido2) AS profesor,a.credito AS credito from grupo g,usuario u, asignatura a where g.id_asignatura=".$reg2[id]." and u.id=g.id_coordinador and g.id_asignatura=a.id") or die("-1%Problemas al mostrar grupos del proyecto en PDF. -> [".$conexion->errno."] ".$conexion->error);
				$grupo =0;
				while($reg3 = $tuplas3->fetch_array()){
					$grupo++;	
					$tuplas4 = $conexion->query("select CONCAT_WS(' ',u.nombre,u.apellido1,u.apellido2) AS profesor,c.credito AS credito,d.nombre AS departamento,a.nombre AS area from usuario u,creditos_grupo c,profesor_uco p,area_conocimiento a,departamento d where c.id_grupo=".$reg3[id]." and c.id_profesor=u.id and p.id=u.id and p.id_area_conocimiento=a.id and a.id_departamento=d.id;") or die("-1%Problemas al mostrar grupos del proyecto en PDF. -> [".$conexion->errno."] ".$conexion->error);
					$x=$pdf->GetX();
					$y=$pdf->GetY();
					$contador =0;
					
					//preguntar si hay profesores en el grupo
					if($tuplas4->num_rows!=0){
						if($tuplas4->num_rows==1){
							$pdf->SetFont('Times','',9);
							$reg4 = $tuplas4->fetch_array();
							$pdf->Cell(45,12,utf8_decode(),1,0);$pdf->Cell(60,12,utf8_decode($reg4[profesor]),LBT,0);$pdf->Cell(10,12,utf8_decode($reg4[credito]."cr"),RBT,0);$pdf->Cell(45,12,utf8_decode($reg4[departamento]),1,0);$pdf->Cell(90,12,utf8_decode($reg4[area]),1,0);$pdf->Cell(25,12,utf8_decode(number_format(calcularPorcentaje($reg4[credito],$reg3[credito]),2)." %"),1,1);
							$pdf->SetFont('Times','B',9);
							$pdf->Text($x+2,$y+3,"GRUPO".$grupo."(".$reg3[credito].")");
							$pdf->Text($x+2,$y+7,"Profesor/a responsable");
							$pdf->Text($x+2,$y+11,utf8_decode($reg3[profesor]));
						}else{
							while($reg4 = $tuplas4->fetch_array()){
								$contador++;
								$pdf->SetFont('Times','',9);
								if($contador==$tuplas4->num_rows){
									$pdf->Cell(45,6,utf8_decode(),LRB,0);$pdf->Cell(60,6,utf8_decode($reg4[profesor]),LB,0);$pdf->Cell(10,6,utf8_decode($reg4[credito]."cr"),RB,0);$pdf->Cell(45,6,utf8_decode($reg4[departamento]),LRB,0);$pdf->Cell(90,6,utf8_decode($reg4[area]),LRB,0);$pdf->Cell(25,6,utf8_decode(number_format(calcularPorcentaje($reg4[credito],$reg3[credito]),2)." %"),LRB,1);
								}else{
									$pdf->Cell(45,6,utf8_decode(),LR,0);$pdf->Cell(60,6,utf8_decode($reg4[profesor]),L,0);$pdf->Cell(10,6,utf8_decode($reg4[credito]."cr"),R,0);$pdf->Cell(45,6,utf8_decode($reg4[departamento]),LR,0);$pdf->Cell(90,6,utf8_decode($reg4[area]),LR,0);$pdf->Cell(25,6,utf8_decode(number_format(calcularPorcentaje($reg4[credito],$reg3[credito]),2)." %"),LR,1);
								}
							}
							$pdf->SetFont('Times','B',9);
							$pdf->Text($x+2,($y+((6*$tuplas4->num_rows)/2))-3,"GRUPO".$grupo."(".$reg3[credito].")");
							$pdf->Text($x+2,($y+((6*$tuplas4->num_rows)/2))+1,"Profesor/a responsable");
							$pdf->Text($x+2,($y+((6*$tuplas4->num_rows)/2))+5,utf8_decode($reg3[profesor]));
						}
					}
					
				}
			}	
		}
		$pdf->Output("../documents/documento.pdf","F");
	break;
	case "Plan Anual de Ordenación de las Enseñanzas (PAOE)":
		$pdf = new FPDF();
		//Establecemos los márgenes izquierda, arriba y derecha: 
		$pdf->SetMargins(20, 30 , 20); 
		//Establecemos el margen inferior: 
		$pdf->SetAutoPageBreak(true,10); 
		$tuplas = $conexion->query("select a.id as id,a.nombre as nombre,a.credito as credito,a.num_grupo as grupo,a.id_modulo as idModulo,m.nombre as modulo,m.tipo_modulo as tipo from asignatura a, modulo m where a.id_modulo=m.id") or die("-1%Problemas al mostrar asignaturas del proyecto en PDF. -> [".$conexion->errno."] ".$conexion->error);
		//Por cada asig añadimos un folio
		while($reg = $tuplas->fetch_array()){
			$pdf->AddPage(L,A4);
			//cabezera PDF
			$pdf->SetFont('Arial','B',12);
			$pdf->Cell(0,5,utf8_decode("INSTITUTO DE ESTUDIOS DE POSTGRADO"),0,1,C);
			$pdf->Cell(0,5,utf8_decode("Másteres Universitarios"),0,1,C);
			$pdf->Ln(5);
			$pdf->Cell(0,5,utf8_decode("Curso ".curso($conexion)),0,1,C);
			$pdf->Ln(5);
			$pdf->SetFillColor(0,0,0);
			$pdf->Cell(20,5,"",1,0,"",true);$pdf->Cell(0,5,"",1,1,"",false);
			$pdf->Ln(5);
			$pdf->SetFillColor(214,214,214);
			//Primera fila de datos
			$pdf->Cell(50,5,utf8_decode("ASIGNATURA"),1,0,C,true);$pdf->Cell(20,5,utf8_decode("CÓDIGO"),1,0,C,true);$pdf->Cell(99,5,utf8_decode("ITINERARIO"),1,0,C,true);$pdf->Cell(25,5,utf8_decode("CRÉDITOS"),1,0,C,true);$pdf->Cell(25,5,utf8_decode("GRUPOS"),1,0,C,true);$pdf->Cell(38,5,utf8_decode("CARÁCTER"),1,1,C,true);
			//Margen superior
			$pdf->Cell(50,5,"",LR,0,C);$pdf->Cell(20,5,"",LR,0,C);$pdf->Cell(99,5,"",LR,0,C);$pdf->Cell(25,5,"",LR,0,C);$pdf->Cell(25,5,"",LR,0,C);$pdf->Cell(38,5,"",LR,1,C);
			//Contenido
			$x1=$pdf->GetX();$y1=$pdf->GetY();//Coger posicion absulota
			$pdf->MultiCell(50,5,utf8_decode($reg[nombre]),LR,C,0);
			$y2=$pdf->GetY();
			$pdf->SetXY($x1+50,$y1);
			$pdf->Cell(20,$y2-$y1,utf8_decode($reg[id]),LR,0,C);$pdf->Cell(99,$y2-$y1,utf8_decode(tipoModulo($conexion,$reg[idModulo])),LR,0,C);$pdf->Cell(25,$y2-$y1,utf8_decode($reg[credito]."x".$reg[grupo]),LR,0,C);$pdf->Cell(25,$y2-$y1,utf8_decode($reg[grupo]." grupos"),LR,0,C);$pdf->Cell(38,$y2-$y1,utf8_decode(caracter($reg[tipo])),LR,1,C);
			//Margen inferior
			$pdf->Cell(50,5,"",LRB,0,C);$pdf->Cell(20,5,"",LRB,0,C);$pdf->Cell(99,5,"",LRB,0,C);$pdf->Cell(25,5,"",LRB,0,C);$pdf->Cell(25,5,"",LRB,0,C);$pdf->Cell(38,5,"",LRB,1,C);
			//Segunda fila de datos
			$pdf->Cell(30,5,"",0,0,C,false);$pdf->Cell(70,5,utf8_decode("DÍAS"),1,0,C,true);$pdf->Cell(25,5,utf8_decode("HORARIO"),1,0,C,true);$pdf->Cell(100,5,utf8_decode("LUGAR"),1,1,C,true);
			$tuplas2 = $conexion->query("select dia_inicio as diaInicio,dia_fin as diaFin,hora_inicio as horaInicio, hora_fin as horaFin, lugar from horario_asignatura where id_asignatura=".$reg[id]) or die("-1%Problemas al mostrar horarios del proyecto en PDF. -> [".$conexion->errno."] ".$conexion->error);
			//Margen superior
			$pdf->SetFont('Arial','',10);
			$pdf->Cell(30,5,"",0,0,C);$pdf->Cell(70,5,"",LR,0,C);$pdf->Cell(25,5,"",LR,0,C);$pdf->Cell(100,5,"",LR,1,C);
			//Contenido
			while($reg2 = $tuplas2->fetch_array()){
				$pdf->Cell(30,5,"",0,0,C);$pdf->Cell(70,5,utf8_decode(strftime("%e %B",strtotime($reg2[diaInicio]))." a ".strftime("%e %B",strtotime($reg2[diaFin]))),LR,0,C);$pdf->Cell(25,5,utf8_decode(substr($reg2[horaInicio],0,5)." a ".substr($reg2[horaFin],0,5)),LR,0,C);$pdf->Cell(100,5,utf8_decode($reg2[lugar]),LR,1,C);
			}
			//Margen inferior
			$pdf->Cell(30,5,"",0,0,C);$pdf->Cell(70,5,"",LRB,0,C);$pdf->Cell(25,5,"",LRB,0,C);$pdf->Cell(100,5,"",LRB,1,C);
			//Tercera fila de datos
			$x=0;$y=0;//reiniciamos posicionamiento de las variables
			$pdf->SetFont('Arial','B',12);
			$pdf->Cell(40,5,utf8_decode("PROFESORADO"),1,0,C,true);$pdf->Cell(50,5,utf8_decode("NOMBRE"),1,0,C,true);$pdf->Cell(35,5,utf8_decode("DNI"),1,0,C,true);$pdf->Cell(25,5,utf8_decode("CRÉDITOS"),1,0,C,true);$pdf->Cell(10,5,utf8_decode("UCO"),1,0,C,true);$pdf->Cell(97,5,utf8_decode("ÁREA CONOCIMIENTO"),1,1,C,true);
			//Contenido
			$pdf->SetFont('Arial','',10);
			$tuplas2 = $conexion->query("SELECT CONCAT_WS(' ' ,u.nombre,u.apellido1,u.apellido2) AS nombre,u.dni as dni, SUM(c.credito) as credito,'Si' as uco,a.nombre as area FROM grupo g,creditos_grupo c,usuario u,profesor p, profesor_uco pu, area_conocimiento a WHERE g.id_asignatura=".$reg[id]." AND c.id_grupo=g.id AND u.id=c.id_profesor AND p.id=u.id AND p.tipo_profesor!='ext' AND pu.id=p.id AND pu.id_area_conocimiento=a.id GROUP BY nombre") or die("-1%Problemas al mostrar profesorado del proyecto en PDF. -> [".$conexion->errno."] ".$conexion->error);
				while($reg2 = $tuplas2->fetch_array()){
					$pdf->Cell(40,5,"",LR,0);$pdf->Cell(50,5,utf8_decode($reg2[nombre]),LRB,0,L);$pdf->Cell(35,5,$reg2[dni],LRB,0,L);$pdf->Cell(25,5,$reg2[credito],LRB,0,L);$pdf->Cell(10,5,$reg2[uco],LRB,0,L);$pdf->Cell(97,5,utf8_decode($reg2[area]),LRB,1,L);
					$x=$pdf->GetX();$y=$pdf->GetY();	
				}
			
			$tuplas2 = $conexion->query("SELECT CONCAT_WS(' ' ,u.nombre,u.apellido1,u.apellido2) AS nombre,u.dni as dni, SUM(c.credito) as credito,'No' as uco,'' as area FROM grupo g,creditos_grupo c,usuario u,profesor p WHERE g.id_asignatura=".$reg[id]." AND c.id_grupo=g.id AND u.id=c.id_profesor AND p.id=u.id AND p.tipo_profesor='ext' GROUP BY nombre") or die("-1%Problemas al mostrar profesorado del proyecto en PDF. -> [".$conexion->errno."] ".$conexion->error);
				while($reg2 = $tuplas2->fetch_array()){	
					$pdf->Cell(40,5,"",LR,0);$pdf->Cell(50,5,utf8_decode($reg2[nombre]),LRB,0,L);$pdf->Cell(35,5,$reg2[dni],LRB,0,L);$pdf->Cell(25,5,$reg2[credito],LRB,0,L);$pdf->Cell(10,5,$reg2[uco],LRB,0,L);$pdf->Cell(97,5,utf8_decode($reg2[area]),LRB,1,L);
					$x=$pdf->GetX();$y=$pdf->GetY();
				}
			//Dibujar ultima linea
			$pdf->Line($x, $y, $x+40, $y);
		}
		
		$pdf->Output("../documents/documento.pdf","F");
	break;
	case "Plantilla Global de Personal Docente":
		//Contador
		$contador=0;
		$pdf = new FPDF();
		//Establecemos los márgenes izquierda, arriba y derecha: 
		$pdf->SetMargins(15, 15 , 15); 
		//Establecemos el margen inferior: 
		$pdf->SetAutoPageBreak(true,15); 
		$pdf->AddPage(L,A4);
		$pdf->SetFont('Arial','B',14);
		//Cabezera del pdf
		$pdf->MultiCell(0,7,utf8_decode("PLANTILLA GLOBAL DE PERSONAL DEL ".mb_strtoupper(master($conexion),'utf-8')),0,C);
		$pdf->Cell(0,7,"Instituto de Estudios de Postgrado de la UCO",0,1,C);
		$pdf->Cell(0,7,"CURSO ".curso($conexion),0,1,C);
		$tuplas = $conexion->query("select m.id as id, m.nombre as modulo, CONCAT_WS(' ' ,u.nombre,u.apellido1,u.apellido2) AS nombre,m.tipo_modulo as tipo from modulo m, usuario u where m.id_coordinador=u.id") or die("-1%Problemas al mostrar modulos del proyecto en PDF. -> [".$conexion->errno."] ".$conexion->error);
		$pdf->Ln(7);
		//Por cada modulo un nuevo pdf
		while($reg = $tuplas->fetch_array()){
			if($contador!=0){
				$pdf->AddPage(L,A4);
			}
			$pdf->SetFont('Arial','BU',12);	
			if($reg[tipo]=='gen'){
				$pdf->Cell(0,7,utf8_decode("(".$contador.") PERSONAL DOCENTE DEL MÓDULO GENÉRICO"),0,1,L);
			}
			if($reg[tipo]=='esp'){
				$pdf->Cell(112,7,utf8_decode("(".$contador.")PERSONAL DOCENTE DEL MÓDULO ESPECÍFICO:"),0,0,L);
				$pdf->SetFont('Arial','',12);
				$pdf->Cell(0,7,utf8_decode(mb_strtoupper($reg[modulo],'utf-8')),0,1,L);
			}
			if($reg[tipo]=='opt'){
				$pdf->Cell(0,7,utf8_decode("(".$contador.")PERSONAL DOCENTE DEL MÓDULO OPTATIVO"),0,1,L);
			}
			//Coordinador del modulo
			$pdf->Ln(4);$pdf->SetFont('Arial','B',11);	
			$pdf->Cell(35,7,utf8_decode("COORDINADORA:"),0,0,L);
			$pdf->SetFont('Arial','',11);	
			$pdf->Cell(0,7,utf8_decode(mb_strtoupper($reg[nombre],'utf-8')),0,1,L);
			$pdf->Ln(4);
			//Vemos si hay profesorado de la UCO
			$tuplas2 = $conexion->query("SELECT u.id,CONCAT_WS(' ' ,u.nombre,u.apellido1,u.apellido2) AS nombre,d.nombre as departamento,a.nombre as area, ua.correo as correo , u.telefono as tfno, SUM(c.credito) as credito FROM usuario u LEFT JOIN usuario_alta ua ON u.id=ua.id,profesor pro,profesor_uco p, area_conocimiento a,departamento d,creditos_grupo c,grupo g,asignatura asig,modulo m where u.tipo_usuario='pro' and p.id=u.id and p.id_area_conocimiento=a.id and a.id_departamento=d.id and c.id_profesor=u.id and c.id_grupo=g.id and g.id_asignatura=asig.id and asig.id_modulo=m.id and m.id=".$reg[id]." and pro.id=u.id and pro.tipo_profesor='uco' GROUP BY u.id") or die("-1%Problemas al mostrar profesorado de la uco del proyecto en PDF. -> [".$conexion->errno."] ".$conexion->error);
			if($tuplas2->num_rows > 0){
				//dibujamos la cabezera
				$pdf->SetFont('Arial','B',11);	
				$pdf->Cell(8,7,utf8_decode(""),0,0);$pdf->Cell(5,7,utf8_decode("(1) "),0,0,L);
				$pdf->SetFont('Arial','U',11);	
				$pdf->Cell(0,7,utf8_decode("PROFESORADO DE LA UCO A TIEMPO COMPLETO"),0,1,L);
				$pdf->Ln(6);
				//cabezera de la tabla
				$pdf->SetFont('Arial','B',9);
				$pdf->Cell(50,5,utf8_decode("Profesorado"),1,0,L);$pdf->Cell(50,5,utf8_decode("Departamento"),1,0,L);$pdf->Cell(75,5,utf8_decode("Área de conocimiento"),1,0,L);$pdf->Cell(45,5,utf8_decode("E-mail"),1,0,L);$pdf->Cell(25,5,utf8_decode("Tfno. contacto"),1,0,L);$pdf->Cell(20,5,utf8_decode("Horas/cred."),1,1,L);
				//Dibujamos los datos
				$pdf->SetFont('Arial','',9);
				while($reg2 = $tuplas2->fetch_array()){
					$pdf->Cell(50,5,utf8_decode($reg2[nombre]),1,0,L);$pdf->Cell(50,5,utf8_decode($reg2[departamento]),1,0,L);$pdf->Cell(75,5,utf8_decode($reg2[area]),1,0,L);$pdf->Cell(45,5,utf8_decode($reg2[correo]),1,0,L);$pdf->Cell(25,5,utf8_decode($reg2[tfno]),1,0,L);$pdf->Cell(20,5,utf8_decode(($reg2[credito]*10)."h / ".$reg2[credito]." cr"),1,1,L);	
				}
			}
			$pdf->Ln(6);
			//Vemos si hay profesorado ASOCIADO
			$tuplas2 = $conexion->query("SELECT u.id,CONCAT_WS(' ' ,u.nombre,u.apellido1,u.apellido2) AS nombre,d.nombre as departamento,a.nombre as area, ua.correo as correo, u.telefono, SUM(c.credito) as credito FROM usuario u LEFT JOIN usuario_alta ua ON u.id=ua.id,profesor pro,profesor_uco p, area_conocimiento a,departamento d,creditos_grupo c, grupo g,asignatura asig,modulo m where u.tipo_usuario='pro' and p.id=u.id and p.id_area_conocimiento=a.id and a.id_departamento=d.id and c.id_profesor=u.id and c.id_grupo=g.id and g.id_asignatura=asig.id and asig.id_modulo=m.id and m.id=".$reg[id]." and pro.id=u.id and pro.tipo_profesor='aso' GROUP BY u.id") or die("-1%Problemas al mostrar profesorado asociado del proyecto en PDF. -> [".$conexion->errno."] ".$conexion->error);
			if($tuplas2->num_rows > 0){
				//dibujamos la cabezera
				$pdf->SetFont('Arial','B',11);	
				$pdf->Cell(8,7,utf8_decode(""),0,0);$pdf->Cell(5,7,utf8_decode("(2) "),0,0,L);
				$pdf->SetFont('Arial','U',11);	
				$pdf->Cell(0,7,utf8_decode("PROFESORADO DE ENSEÑANZA ASOCIADO A LA UCO"),0,1,L);
				$pdf->Ln(6);
				//cabezera de la tabla
				$pdf->SetFont('Arial','B',9);
				$pdf->Cell(50,5,utf8_decode("Profesorado"),1,0,L);$pdf->Cell(50,5,utf8_decode("Departamento"),1,0,L);$pdf->Cell(75,5,utf8_decode("Área de conocimiento"),1,0,L);$pdf->Cell(45,5,utf8_decode("E-mail"),1,0,L);$pdf->Cell(25,5,utf8_decode("Tfno. contacto"),1,0,L);$pdf->Cell(20,5,utf8_decode("Horas/cred."),1,1,L);
				//Dibujamos los datos
				$pdf->SetFont('Arial','',9);
				while($reg2 = $tuplas2->fetch_array()){
					$pdf->Cell(50,5,utf8_decode($reg2[nombre]),1,0,L);$pdf->Cell(50,5,utf8_decode($reg2[departamento]),1,0,L);$pdf->Cell(75,5,utf8_decode($reg2[area]),1,0,L);$pdf->Cell(45,5,utf8_decode($reg2[correo]),1,0,L);$pdf->Cell(25,5,utf8_decode($reg2[tfno]),1,0,L);$pdf->Cell(20,5,utf8_decode(($reg2[credito]*10)."h / ".$reg2[credito]." cr"),1,1,L);	
				}
			}
			$pdf->Ln(6);
			//Vemos si hay profesorado EXTERNO
			$tuplas2 = $conexion->query("SELECT u.id,CONCAT_WS(' ' ,u.nombre,u.apellido1,u.apellido2) AS nombre,d.nombre as departamento,ce.nombre as area, ua.correo as correo, u.telefono, SUM(c.credito) as credito FROM usuario u LEFT JOIN usuario_alta ua ON u.id=ua.id,profesor pro,profesor_externo p,departamento_es d,centro ce,creditos_grupo c, grupo g,asignatura asig,modulo m where u.tipo_usuario='pro' and p.id=u.id and p.id_departamento_es=d.id and d.id_centro=ce.id and c.id_profesor=u.id and c.id_grupo=g.id and g.id_asignatura=asig.id and asig.id_modulo=m.id and pro.id=u.id and pro.tipo_profesor='ext' and m.id=".$reg[id]." GROUP BY u.id") or die("-1%Problemas al mostrar profesorado externo del proyecto en PDF. -> [".$conexion->errno."] ".$conexion->error);
			if($tuplas2->num_rows > 0){
				//dibujamos la cabezera
				$pdf->SetFont('Arial','B',11);	
				$pdf->Cell(8,7,utf8_decode(""),0,0);$pdf->Cell(5,7,utf8_decode("(3) "),0,0,L);
				$pdf->SetFont('Arial','U',11);	
				$pdf->Cell(0,7,utf8_decode("PROFESORADO DE ENSEÑANZA EXTERNO A LA UCO"),0,1,L);
				$pdf->Ln(6);
				//cabezera de la tabla
				$pdf->SetFont('Arial','B',9);
				$pdf->Cell(50,5,utf8_decode("Profesorado"),1,0,L);$pdf->Cell(50,5,utf8_decode("Departamento"),1,0,L);$pdf->Cell(75,5,utf8_decode("Área de conocimiento"),1,0,L);$pdf->Cell(45,5,utf8_decode("E-mail"),1,0,L);$pdf->Cell(25,5,utf8_decode("Tfno. contacto"),1,0,L);$pdf->Cell(20,5,utf8_decode("Horas/cred."),1,1,L);
				//Dibujamos los datos
				$pdf->SetFont('Arial','',9);
				while($reg2 = $tuplas2->fetch_array()){
					$pdf->Cell(50,5,utf8_decode($reg2[nombre]),1,0,L);$pdf->Cell(50,5,utf8_decode($reg2[departamento]),1,0,L);$pdf->Cell(75,5,utf8_decode($reg2[area]),1,0,L);$pdf->Cell(45,5,utf8_decode($reg2[correo]),1,0,L);$pdf->Cell(25,5,utf8_decode($reg2[tfno]),1,0,L);$pdf->Cell(20,5,utf8_decode(($reg2[credito]*10)."h / ".$reg2[credito]." cr"),1,1,L);	
				}
			}
			$contador++;
		}
		$pdf->Output("../documents/documento.pdf","F");
	break;
	case "Defensa del Trabajo de Fin de Máster":
		//Creamos el objeto pdf (con medidas en milímetros): 
		$pdf = new FPDF('P', 'mm', 'A4'); 
		//Establecemos los márgenes izquierda, arriba y derecha: 
		$pdf->SetMargins(40, 75 , 25); 
		//Establecemos el margen inferior: 
		$pdf->SetAutoPageBreak(true,25); 
		//Añadir página
		$pdf->AddPage();
		$pdf->SetFont('Arial','B',12);
		$pdf->MultiCell(0,8,utf8_decode(director($conexion)." del Máster en ".master($conexion)." de la Universidad de ".provincia($conexion)),0,J);
		// Salto de línea
		$pdf->Ln(15);
		$pdf->SetFont('Times','',13);
		$pdf->Cell(0,10,"INFORMA QUE:",0,1);
		$pdf->MultiCell(0,8,utf8_decode("\t\t\t\t\t\t ".alumno($conexion,$_REQUEST['id_alumno'])." ".nombre($conexion,$_REQUEST['id_alumno'])." ".apellido1($conexion,$_REQUEST['id_alumno'])." ".apellido2($conexion,$_REQUEST['id_alumno']).", con DNI: ".dni($conexion,$_REQUEST['id_alumno']).", ha asistido a la/al ".$_REQUEST['dato_requerido_texto']." para realizar la ".$_REQUEST['titulo']." del ".master($conexion)." ".strftime("el día %e de %B de %Y",strtotime(str_replace("/", "-", $_REQUEST['dato_requerido_fecha'])))." a partir de las ".$_REQUEST['dato_requerido_hora']." horas."),0,J);
		// Salto de línea
		$pdf->Ln(10);
		$pdf->MultiCell(0,8,utf8_decode("\t\t\t\t\t\t Para que conste y surta los efectos oportunos, expido el presente informe, el día de la fecha indicada anteriormente."),0,J);
		// Salto de línea
		$pdf->Ln(10);
		$pdf->MultiCell(0,8,utf8_decode("\t\t\t\t\t\t En ".provincia($conexion).", ".strftime("a %e de %B de %Y")),0,J);
		$pdf->Output("../documents/documento.pdf","F");
	break;
	case "Coordinador/a de la Especialidad":
		//Creamos el objeto pdf (con medidas en milímetros): 
		$pdf = new FPDF('P', 'mm', 'A4'); 
		//Establecemos los márgenes izquierda, arriba y derecha: 
		$pdf->SetMargins(40, 75 , 25); 
		//Establecemos el margen inferior: 
		$pdf->SetAutoPageBreak(true,25); 
		//Añadir página
		$pdf->AddPage();
		$pdf->SetFont('Arial','B',12);
		$pdf->MultiCell(0,8,utf8_decode(director($conexion)." del Máster en ".master($conexion)." de la Universidad de ".provincia($conexion)),0,J);
		// Salto de línea
		$pdf->Ln(15);
		$pdf->SetFont('Times','',13);
		$pdf->Cell(0,10,"INFORMA QUE:",0,1);
		$pdf->MultiCell(0,8,utf8_decode("\t\t\t\t\t\t ".profesor($conexion,$_REQUEST['id_profesor'])." ".nombre($conexion,$_REQUEST['id_profesor'])." ".apellido1($conexion,$_REQUEST['id_profesor'])." ".apellido2($conexion,$_REQUEST['id_profesor']).", con DNI: ".dni($conexion,$_REQUEST['id_profesor']).", ha actuado como ".$_REQUEST['titulo']." de ".especialidad($conexion,$_REQUEST['especialidad'])." en el ".master($conexion)." de la Universidad de Córdoba, durante el Curso Académico ".curso($conexion)."."),0,J);
		// Salto de línea
		$pdf->Ln(10);
		$pdf->MultiCell(0,8,utf8_decode("\t\t\t\t\t\t A petición del interesado, para que conste y surta los efectos oportunos, expido el presente certificado en ".provincia($conexion)." ".strftime("a %e de %B de %Y")."."),0,J);
		$pdf->Output("../documents/documento.pdf","F");
	break;
	case "Coordinador/a del Módulo Genérico":
		//Creamos el objeto pdf (con medidas en milímetros): 
		$pdf = new FPDF('P', 'mm', 'A4'); 
		//Establecemos los márgenes izquierda, arriba y derecha: 
		$pdf->SetMargins(40, 75 , 25); 
		//Establecemos el margen inferior: 
		$pdf->SetAutoPageBreak(true,25); 
		//Añadir página
		$pdf->AddPage();
		$pdf->SetFont('Arial','B',12);
		$pdf->MultiCell(0,8,utf8_decode(director($conexion)." del Máster en ".master($conexion)." de la Universidad de ".provincia($conexion)),0,J);
		// Salto de línea
		$pdf->Ln(15);
		$pdf->SetFont('Times','',13);
		$pdf->Cell(0,10,"INFORMA QUE:",0,1);
		$pdf->MultiCell(0,8,utf8_decode("\t\t\t\t\t\t ".profesor($conexion,$_REQUEST['id_profesor'])." ".nombre($conexion,$_REQUEST['id_profesor'])." ".apellido1($conexion,$_REQUEST['id_profesor'])." ".apellido2($conexion,$_REQUEST['id_profesor']).", con DNI: ".dni($conexion,$_REQUEST['id_profesor']).", ha sido ".$_REQUEST['titulo']." del ".master($conexion).", organizado por el Instituto de Estudios de Postgrado de la Universidad de Córdoba, durante el Curso Académico ".curso($conexion)."."),0,J);
		// Salto de línea
		$pdf->Ln(10);
		$pdf->MultiCell(0,8,utf8_decode("\t\t\t\t\t\t A petición del interesado, para que conste y surta los efectos oportunos, expido el presente certificado en ".provincia($conexion)." ".strftime("a %e de %B de %Y")."."),0,J);
		$pdf->Output("../documents/documento.pdf","F");
	break;
	case "Director/a-Tutor/a del Trabajo Fin de Máster":
		//Creamos el objeto pdf (con medidas en milímetros): 
		$pdf = new FPDF('P', 'mm', 'A4'); 
		//Establecemos los márgenes izquierda, arriba y derecha: 
		$pdf->SetMargins(40, 75 , 25); 
		//Establecemos el margen inferior: 
		$pdf->SetAutoPageBreak(true,25); 
		//Añadir página
		$pdf->AddPage();
		$pdf->SetFont('Arial','B',12);
		$pdf->MultiCell(0,8,utf8_decode(director($conexion)." del Máster en ".master($conexion)." de la Universidad de ".provincia($conexion)),0,J);
		// Salto de línea
		$pdf->Ln(15);
		$pdf->SetFont('Times','',13);
		$pdf->Cell(0,10,"INFORMA QUE:",0,1);
		$pdf->MultiCell(0,8,utf8_decode("\t\t\t\t\t\t ".profesor($conexion,$_REQUEST['id_profesor'])." ".nombre($conexion,$_REQUEST['id_profesor'])." ".apellido1($conexion,$_REQUEST['id_profesor'])." ".apellido2($conexion,$_REQUEST['id_profesor']).", con DNI: ".dni($conexion,$_REQUEST['id_profesor']).", ha actuado como ".$_REQUEST['titulo']." titulado \"".proyecto($conexion,$_REQUEST['id_alumno'])."\" desarrollado por ".alumno($conexion,$_REQUEST['id_alumno'],1)." ".nombre($conexion,$_REQUEST['id_alumno'])." ".apellido1($conexion,$_REQUEST['id_alumno'])." ".apellido2($conexion,$_REQUEST['id_alumno']).", con DNI ".dni($conexion,$_REQUEST['id_alumno']).", en el ".master($conexion).", organizado por el Instituto de Estudios de Postgrado de la Universidad de ".provincia($conexion).", durante el Curso Académico ".curso($conexion).", habiendo obtenido una calificación de ".nota($conexion,$_REQUEST['id_alumno'])." en la convocatoria ".convocatoria($conexion,$_REQUEST['id_alumno'])."."),0,J);
		// Salto de línea
		$pdf->Ln(10);
		$pdf->MultiCell(0,8,utf8_decode("\t\t\t\t\t\t A petición del interesado, para que conste y surta los efectos oportunos, expido el presente certificado en ".provincia($conexion)." ".strftime("a %e de %B de %Y")."."),0,J);
		$pdf->Output("../documents/documento.pdf","F");
	break;
	case "Mienbro del tribunal evaluador del Trabajo Fin de Máster":
		//Creamos el objeto pdf (con medidas en milímetros): 
		$pdf = new FPDF('P', 'mm', 'A4'); 
		//Establecemos los márgenes izquierda, arriba y derecha: 
		$pdf->SetMargins(40, 75 , 25); 
		//Establecemos el margen inferior: 
		$pdf->SetAutoPageBreak(true,25); 
		//Añadir página
		$pdf->AddPage();
		$pdf->SetFont('Arial','B',12);
		$pdf->MultiCell(0,8,utf8_decode(director($conexion)." del Máster en ".master($conexion)." de la Universidad de ".provincia($conexion)),0,J);
		// Salto de línea
		$pdf->Ln(15);
		$pdf->SetFont('Times','',13);
		$pdf->Cell(0,10,"INFORMA QUE:",0,1);
		$pdf->MultiCell(0,8,utf8_decode("\t\t\t\t\t\t ".profesor($conexion,$_REQUEST['id_profesor'])." ".nombre($conexion,$_REQUEST['id_profesor'])." ".apellido1($conexion,$_REQUEST['id_profesor'])." ".apellido2($conexion,$_REQUEST['id_profesor']).", con DNI: ".dni($conexion,$_REQUEST['id_profesor']).", ha participado como ".$_REQUEST['titulo']." del siguiente alumnado en la especialidad ".especialidad($conexion,$_REQUEST['especialidad'])." del ".master($conexion).", organizado por el Instituto de Estudios de Postgrado de la Universidad de ".provincia($conexion).", durante el Curso Académico ".curso($conexion)."."),0,J);
		// Salto de línea
		$pdf->Ln(10);
		//Tabla de Alumnado
		// Cabecera
		$pdf->SetFillColor(166,166,166); //Color de fondo
		$pdf->SetFont('Arial','B',10);//Tipo de letra y tamaño
		$pdf->Cell(6,6,"",0,0,'C',false);$pdf->Cell(75,6,utf8_decode("ALUMNO O ALUMNA"),1,0,'L',true);$pdf->Cell(59,6,utf8_decode("CALIFICACIÓN"),1,0,'L',true);
		$pdf->Ln();
	   //Cuerpo de la tabla
		$pdf->SetFont('Arial','',9);//Tipo de letra y tamaño
		$tuplas = $conexion->query("SELECT CONCAT_WS(' ',u.nombre,u.apellido1,u.apellido2) AS nombre,p.nota AS nota FROM tribunal t, proyecto p, alumno a, usuario u WHERE t.id_proyecto = p.id AND t.id_miembro =".$_REQUEST['id_profesor']." AND p.id = a.id_proyecto AND a.id_modulo = ".$_REQUEST['especialidad']." AND a.id = u.id") or die("-1%Problemas al mostrar alumnos del proyecto en PDF. -> [".$conexion->errno."] ".$conexion->error);
		while($reg = $tuplas->fetch_array()){
			$pdf->Cell(6,6,"",0);$pdf->Cell(75,6,utf8_decode($reg[nombre]),1);$pdf->Cell(59,6,valorarNota($reg[nota]),1);$pdf->Ln();
		} 
		$pdf->SetFont('Times','',13);
		// Salto de línea
		$pdf->Ln(10);
		$pdf->MultiCell(0,8,utf8_decode("\t\t\t\t\t\t A petición del interesado, para que conste y surta los efectos oportunos, expido el presente certificado en ".provincia($conexion)." ".strftime("a %e de %B de %Y")."."),0,J);
		$pdf->Output("../documents/documento.pdf","F");
	break;
	case "Docente en un Seminario":
		//Creamos el objeto pdf (con medidas en milímetros): 
		$pdf = new FPDF('P', 'mm', 'A4'); 
		//Establecemos los márgenes izquierda, arriba y derecha: 
		$pdf->SetMargins(40, 75 , 25); 
		//Establecemos el margen inferior: 
		$pdf->SetAutoPageBreak(true,25); 
		//Añadir página
		$pdf->AddPage();
		$pdf->SetFont('Arial','B',12);
		$pdf->MultiCell(0,8,utf8_decode(director($conexion)." del Máster en ".master($conexion)." de la Universidad de ".provincia($conexion)),0,J);
		// Salto de línea
		$pdf->Ln(15);
		$pdf->SetFont('Times','',13);
		$pdf->Cell(0,10,"INFORMA QUE:",0,1);
		//MIRAR LINEA ERROR¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡
		//$pdf->MultiCell(0,8,utf8_decode("\t\t\t\t\t\t ".profesor($conexion,$_REQUEST['id_profesor'])." ".nombre($conexion,$_REQUEST['id_profesor'])." ".apellido1($conexion,$_REQUEST['id_profesor'])." ".apellido2($conexion,$_REQUEST['id_profesor']).", con DNI: ".dni($conexion,$_REQUEST['id_profesor']).", ha participado como ".$_REQUEST['titulo']." sobre \"".$_REQUEST['dato_requerido_texto']."\", realizado en el ".tipoModulo($conexion,$_REQUEST['especialidad'])." del ".master($conexion).", de la Universidad de ".provincia($conexion).", celebrado ".strftime("el día %e de %B de %Y",strtotime(str_replace("/", "-", $_REQUEST['dato_requerido_fecha']))).", con una duración de ".$_REQUEST['dato_requerido_numero']." horas."),0,J);
		// Salto de línea
		$pdf->Ln(10);
		$pdf->MultiCell(0,8,utf8_decode("\t\t\t\t\t\t A petición del interesado, para que conste y surta los efectos oportunos, expido el presente certificado en ".provincia($conexion)." ".strftime("a %e de %B de %Y")."."),0,J);
		$pdf->Output("../documents/documento.pdf","F");
	break;
	case "Miembro de la Unidad de Garantía de Calidad del Máster":
		//Creamos el objeto pdf (con medidas en milímetros): 
		$pdf = new FPDF('P', 'mm', 'A4'); 
		//Establecemos los márgenes izquierda, arriba y derecha: 
		$pdf->SetMargins(40, 75 , 25); 
		//Establecemos el margen inferior: 
		$pdf->SetAutoPageBreak(true,25); 
		//Añadir página
		$pdf->AddPage();
		$pdf->SetFont('Arial','B',12);
		$pdf->MultiCell(0,8,utf8_decode(director($conexion)." del Máster en ".master($conexion)." de la Universidad de ".provincia($conexion)),0,J);
		// Salto de línea
		$pdf->Ln(15);
		$pdf->SetFont('Times','',13);
		$pdf->Cell(0,10,"INFORMA QUE:",0,1);
		$pdf->MultiCell(0,8,utf8_decode("\t\t\t\t\t\t ".profesor($conexion,$_REQUEST['id_profesor'])." ".nombre($conexion,$_REQUEST['id_profesor'])." ".apellido1($conexion,$_REQUEST['id_profesor'])." ".apellido2($conexion,$_REQUEST['id_profesor']).", ".doctor($conexion,$_REQUEST['id_profesor'])." en el Departamento de ".departamento($conexion,$_REQUEST['id_profesor'])." de la Universidad de ".provincia($conexion).", con DNI: ".dni($conexion,$_REQUEST['id_profesor']).", continúa siendo  ".$_REQUEST['titulo']." en el ".master($conexion)." de la Universidad de ".provincia($conexion).", durante el curso académico ".curso($conexion)."."),0,J);
		// Salto de línea
		$pdf->Ln(10);
		$pdf->MultiCell(0,8,utf8_decode("\t\t\t\t\t\t A petición del interesado, para que conste y surta los efectos oportunos, expido el presente certificado en ".provincia($conexion)." ".strftime("a %e de %B de %Y")."."),0,J);
		$pdf->Output("../documents/documento.pdf","F");
	break;
	case "Miembro de la Comisión de Prácticas del Máster":
		//Creamos el objeto pdf (con medidas en milímetros): 
		$pdf = new FPDF('P', 'mm', 'A4'); 
		//Establecemos los márgenes izquierda, arriba y derecha: 
		$pdf->SetMargins(40, 75 , 25); 
		//Establecemos el margen inferior: 
		$pdf->SetAutoPageBreak(true,25); 
		//Añadir página
		$pdf->AddPage();
		$pdf->SetFont('Arial','B',12);
		$pdf->MultiCell(0,8,utf8_decode(director($conexion)." del Máster en ".master($conexion)." de la Universidad de ".provincia($conexion)),0,J);
		// Salto de línea
		$pdf->Ln(15);
		$pdf->SetFont('Times','',13);
		$pdf->Cell(0,10,"INFORMA QUE:",0,1);
		$pdf->MultiCell(0,8,utf8_decode("\t\t\t\t\t\t ".profesor($conexion,$_REQUEST['id_profesor'])." ".nombre($conexion,$_REQUEST['id_profesor'])." ".apellido1($conexion,$_REQUEST['id_profesor'])." ".apellido2($conexion,$_REQUEST['id_profesor']).", ".doctor($conexion,$_REQUEST['id_profesor'])." con DNI: ".dni($conexion,$_REQUEST['id_profesor']).", ha actuado como  ".$_REQUEST['titulo']." en el ".master($conexion)." de la Universidad de ".provincia($conexion).", durante el curso académico ".curso($conexion)."."),0,J);
		// Salto de línea
		$pdf->Ln(10);
		$pdf->MultiCell(0,8,utf8_decode("\t\t\t\t\t\t A petición del interesado, para que conste y surta los efectos oportunos, expido el presente certificado en ".provincia($conexion)." ".strftime("a %e de %B de %Y")."."),0,J);
		$pdf->Output("../documents/documento.pdf","F");
	break;
	case "Actividades Docentes":
		//Creamos el objeto pdf (con medidas en milímetros): 
		$pdf = new FPDF('P', 'mm', 'A4'); 
		//Establecemos los márgenes izquierda, arriba y derecha: 
		$pdf->SetMargins(40, 75 , 25); 
		//Establecemos el margen inferior: 
		$pdf->SetAutoPageBreak(true,25); 
		//Añadir página
		$pdf->AddPage();
		$pdf->SetFont('Arial','B',12);
		$pdf->MultiCell(0,8,utf8_decode(director($conexion)." del Máster en ".master($conexion)." de la Universidad de ".provincia($conexion)),0,J);
		// Salto de línea
		$pdf->Ln(15);
		$pdf->SetFont('Times','',13);
		$pdf->Cell(0,10,"INFORMA QUE:",0,1);
		$pdf->MultiCell(0,8,utf8_decode("\t\t\t\t\t\t ".profesor($conexion,$_REQUEST['id_profesor'])." ".nombre($conexion,$_REQUEST['id_profesor'])." ".apellido1($conexion,$_REQUEST['id_profesor'])." ".apellido2($conexion,$_REQUEST['id_profesor'])." con DNI: ".dni($conexion,$_REQUEST['id_profesor']).", ".doctor($conexion,$_REQUEST['id_profesor']).", ha desarrollado ".$_REQUEST['titulo']." en la asignatura \"".asignatura($conexion,$_REQUEST['asignatura'])."\" del ".idModulo($conexion,$_REQUEST['asignatura'])." del ".master($conexion).", organizado por el Instituto de Estudios de Posgrado de la Universidad de ".provincia($conexion).", durante el curso académico ".curso($conexion).", contabilizando un total de ".horas($conexion,$_REQUEST['asignatura'],$_REQUEST['id_profesor'])." horas de docencia."),0,J);
		// Salto de línea
		$pdf->Ln(10);
		$pdf->MultiCell(0,8,utf8_decode("\t\t\t\t\t\t A petición del interesado, para que conste y surta los efectos oportunos, expido el presente certificado en ".provincia($conexion)." ".strftime("a %#d de %B de %Y")."."),0,J);
		$pdf->Output("../documents/documento.pdf","F");
	break;
	default:
		//echo($_REQUEST['titulo']);
	break;
	
}

$conexion->close();
	
//************** FUNCIONES ******************
function alumno($mysqli,$id_alumno,$minuscula = 0){
	$cadena;
	$tuplas = $mysqli->query("select sexo from usuario where id=".$id_alumno) or die("-1%Problemas al mostrar sexo en PDF. -> [".$conexion->errno."] ".$conexion->error);
	$reg = $tuplas->fetch_array();
	$sexo = $reg[sexo];
	if($sexo=="H"){
		$cadena="el alumno Dº.";	
	}else{
		$cadena="la alumna Dª.";
	}
	if($minuscula==0){
		return ucfirst($cadena);
	}else{
		return $cadena;
	}
}

function profesor($mysqli,$id_profesor){
	$tuplas = $mysqli->query("select sexo from usuario where id=".$id_profesor) or die("-1%Problemas al mostrar sexo en PDF. -> [".$conexion->errno."] ".$conexion->error);
	$reg = $tuplas->fetch_array();
	$sexo = $reg[sexo];
	if($sexo=="H"){
		return "El profesor Dº.";
	}else{
		return "La profesora Dª.";
	}
}

function nombre($mysqli,$id_alumno){
	$tuplas = $mysqli->query("select nombre from usuario where id=".$id_alumno) or die("-1%Problemas al mostrar nombre en PDF. -> [".$conexion->errno."] ".$conexion->error);
	$reg = $tuplas->fetch_array();
	return $reg[nombre];
}

function apellido1($mysqli,$id_alumno){
	$tuplas = $mysqli->query("select apellido1 from usuario where id=".$id_alumno) or die("-1%Problemas al mostrar apellido1 en PDF. -> [".$conexion->errno."] ".$conexion->error);
	$reg = $tuplas->fetch_array();
	return $reg[apellido1];
}

function apellido2($mysqli,$id_alumno){
	$tuplas = $mysqli->query("select apellido2 from usuario where id=".$id_alumno) or die("-1%Problemas al mostrar apellido2 en PDF. -> [".$conexion->errno."] ".$conexion->error);
	$reg = $tuplas->fetch_array();
	return $reg[apellido2];
}

function dni($mysqli,$id_alumno){
	$tuplas = $mysqli->query("select dni from usuario where id=".$id_alumno) or die("-1%Problemas al mostrar dni en PDF. -> [".$conexion->errno."] ".$conexion->error);
	$reg = $tuplas->fetch_array();
	return $reg[dni];
}

function master($mysqli){
	$tuplas = $mysqli->query("select nombre from master") or die("-1%Problemas al mostrar nombre del master en PDF. -> [".$conexion->errno."] ".$conexion->error);
	$reg = $tuplas->fetch_array();
	return $reg[nombre];
}

function curso($mysqli){
	$tuplas = $mysqli->query("select curso from master") or die("-1%Problemas al mostrar curso del master en PDF. -> [".$conexion->errno."] ".$conexion->error);
	$reg = $tuplas->fetch_array();
	return $reg[curso];
}

function director($mysqli){
	$tuplas = $mysqli->query("select CONCAT_WS(' ',u.nombre,u.apellido1,u.apellido2) AS director, u.sexo AS sexo from master m,usuario u where u.id=m.id_director") or die("-1%Problemas al mostrar nombre del director del master en PDF. -> [".$conexion->errno."] ".$conexion->error);
	$reg = $tuplas->fetch_array();
	if ($reg[sexo]=='M'){
		return "Dª. ".mb_strtoupper($reg[director],'utf-8').", Directora Académica";
	}else{
		return "Dº. ".mb_strtoupper($reg[director],'utf-8').", Director Académico";
	}
}

function provincia($mysqli){
	$tuplas = $mysqli->query("select provincia from master") or die("-1%Problemas al mostrar provincia del master en PDF. -> [".$conexion->errno."] ".$conexion->error);
	$reg = $tuplas->fetch_array();
	return $reg[provincia];
}

function proyecto($mysqli,$id_alumno){
	$tuplas = $mysqli->query("select p.nombre as nombre from proyecto p,alumno a where a.id=".$id_alumno." and a.id_proyecto=p.id") or die("-1%Problemas al mostrar nombre del proyecto en PDF. -> [".$conexion->errno."] ".$conexion->error);
	$reg = $tuplas->fetch_array();
	return $reg[nombre];
}

function nota($mysqli,$id_alumno){
	$tuplas = $mysqli->query("select p.nota as nota from proyecto p,alumno a where a.id=".$id_alumno." and a.id_proyecto=p.id") or die("-1%Problemas al mostrar nota del proyecto en PDF. -> [".$conexion->errno."] ".$conexion->error);
	$reg = $tuplas->fetch_array();
	return valorarNota($reg[nota]);
}
	
function convocatoria($mysqli,$id_alumno){
	$tuplas = $mysqli->query("select p.convocatoria as convocatoria from proyecto p,alumno a where a.id=".$id_alumno." and a.id_proyecto=p.id") or die("-1%Problemas al mostrar convocatoria del proyecto en PDF. -> [".$conexion->errno."] ".$conexion->error);
	$reg = $tuplas->fetch_array();
	return $reg[convocatoria];
}

function valorarNota($nota){
	//Asigmamos la nota
	if($nota<5.00){
		return $nota." (Insuficiente)";
	}else{
		if($nota>=5.00 and $nota<6.00){
			return $nota." (Suficiente)";
		}else{
			if($nota>=6.00 and $nota<7.00){
				return $nota." (Bien)";
			}else{
				if($nota>=7.00 and $nota<9.00){
					return $nota." (Notable)";
				}else{
					return $nota." (Sobresaliente)";
				}
			}
		}
	}
}

function especialidad($mysqli,$id_especialidad){
	$tuplas = $mysqli->query("select nombre from modulo where id=".$id_especialidad) or die("-1%Problemas al mostrar nombre especialidad en PDF. -> [".$conexion->errno."] ".$conexion->error);
	$reg = $tuplas->fetch_array();
	return $reg[nombre];
}

function tipoModulo($mysqli,$id_especialidad){
	$tuplas = $mysqli->query("select nombre,tipo_modulo from modulo where id=".$id_especialidad) or die("-1%Problemas al mostrar tipo especialidad en PDF. -> [".$conexion->errno."] ".$conexion->error);
	$reg = $tuplas->fetch_array();
	if($reg[tipo_modulo]=='gen'){
		return "Módulo General";
	}
	if($reg[tipo_modulo]=='esp'){
		return "Módulo Especifico ".$reg[nombre];
	}
	if($reg[tipo_modulo]=='opt'){
		return "Módulo Optativo ".$reg[nombre];
	}
}

function doctor($mysqli,$id_profesor){
	$tuplas = $mysqli->query("select sexo from usuario where id=".$id_profesor) or die("-1%Problemas al mostrar sexo en PDF. -> [".$conexion->errno."] ".$conexion->error);
	$reg = $tuplas->fetch_array();
	if($reg[sexo]=="H"){
		return "profesor contratado doctor";
	}else{
		return "profesora contratada doctora";
	}
}	

function departamento($mysqli,$id_profesor){
	$tuplas = $mysqli->query("select d.nombre as departamento from profesor_uco p,area_conocimiento a,departamento d where p.id_area_conocimiento=a.id and a.id_departamento=d.id and p.id=".$id_profesor) or die("-1%Problemas al mostrar departamento en PDF. -> [".$conexion->errno."] ".$conexion->error);
	$reg = $tuplas->fetch_array();
	return $reg[departamento];
}

function asignatura($mysqli,$id_asignatura){
	$tuplas = $mysqli->query("select nombre as asignatura from asignatura where id=".$id_asignatura) or die("-1%Problemas al mostrar asignatura en PDF. -> [".$conexion->errno."] ".$conexion->error);
	$reg = $tuplas->fetch_array();
	return $reg[asignatura];
}

function idModulo($mysqli,$id_asignatura){
	$tuplas = $mysqli->query("select m.id as id from asignatura a,modulo m where a.id=".$id_asignatura." and a.id_modulo=m.id") or die("-1%Problemas al mostrar tipo del modulo en PDF. -> [".$conexion->errno."] ".$conexion->error);
	$reg = $tuplas->fetch_array();
	return tipoModulo($mysqli,$reg[id]);
}

function horas($mysqli,$id_asignatura,$id_profesor){
	$total=0;
	$tuplas = $mysqli->query("select credito from creditos_grupo c, grupo g where c.id_profesor=".$id_profesor." and g.id_asignatura=".$id_asignatura." and g.id=c.id_grupo") or die("-1%Problemas al mostrar horas contabilizadas en PDF. -> [".$conexion->errno."] ".$conexion->error);
	while($reg = $tuplas->fetch_array()){
		$total=$total+$reg[credito];
	}
	return $total*10;
}

function calcularPorcentaje($valor,$total){
	return (100*$valor/$total);
 }
 
function caracter($tipoModulo){
	if($tipoModulo=='gen' or $tipoModulo=='esp'){
		return "Obligatorio";
	}else{
		return "Optativo";
	}
 }
?>